home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 31
/
Aminet 31 (1999)(Schatztruhe)[!][Jun 1999].iso
/
Aminet
/
util
/
misc
/
ARC32.lha
/
ARC
/
Install
/
Install_ARC
< prev
next >
Wrap
Text File
|
1999-03-09
|
11KB
|
295 lines
; ***************************************************************
; $VER: ARC v3.2 Installer Script 1.4 (09.03.1999) by Jens Weyer
; ***************************************************************
(set #def_lang_English 0)
(set #def_lang_Deutsch 1)
(set #def_lang_Italiano 2)
(set #def_lang_Srpski 3)
(set #def_lang_Français 4)
(set #def_lang_Svenska 5)
(set #def_lang_Polski 6)
(set #def_lang_Greek 7)
(set #def_doc_English 0)
(set #def_doc_Deutsch 1)
(set #def_doc_Italiano 2)
(set #def_doc_Srpski 3)
(set #def_doc_Polski 4)
(set #def_cat_lang #def_lang_English)
(set #def_doc_lang #def_doc_English)
(set #wrongOS "ARC needs at least OS 2.x to run\n")
(set #ARCInst_dir (cat "Choose ARC directory\n"
"(NO extra drawer will be created!)"))
(set #lang_catalog (cat "Which catalog file do you want to install?\n"
"(English language is built-in)"))
(set #lang_manual "Select language for AmigaGuide® documentation")
(set #icons_prompt "Which icons do you want to install?\n")
(set #ndx_prompt (cat "Do you want to install the updated\n"
"Aminet® Index List ?\n"
"(updated: 02-Feb-99)\n"))
(set #brain_prompt (cat "Do you also want to install the\n"
"example brainfile ?\n"
"(contains only 1 entry !)\n"))
(set #Y "Sure !")
(set #N "Naah...")
(set #done_1 (cat "\nARC has been succesfuly installed.\n\n"
"Click the \"ARC\" icon in the\n"))
(set #done_2 "\ndirectory to run it.")
(if (= @language "deutsch")
(
(set #def_cat_lang #def_lang_Deutsch)
(set #def_doc_lang #def_doc_Deutsch)
(set #wrongOS "ARC benötigt OS 2.x oder höher\n")
(set #ARCInst_dir (cat"Wählen Sie ein Verzeichnis für ARC\n"
"(es wird KEIN eigenes Verzeichnis erstellt!)"))
(set #lang_catalog (cat "Welche catalog-Datei wollen Sie installieren?\n"
"(Englisch ist eingebaut)"))
(set #lang_manual "Wählen Sie eine Sprache für die AmigaGuide® Dokumentation")
(set #icons_prompt "Welche Piktogramme wollen Sie installieren?")
(set #ndx_prompt (cat "Wollen Sie die aktualisierte\n"
"Aminet® Index Liste installieren ?\n"
"(aktualisiert: 02-Feb-99)\n"))
(set #brain_prompt (cat "Wollen Sie das Beispiel-Brainfile\n"
"installieren ?\n"
"(enthält nur einen Eintrag !)\n"))
(set #Y "Natürlich !")
(set #N "Lieber nicht...")
(set #done_1 (cat "\nARC wurde erfolgreich installiert.\n\n"
"Klicken Sie auf das \"ARC\"-Icon im Verzeichnis,\n"))
(set #done_2 "\num ARC zu starten.")
)
)
(if (= @language "italiano")
(
(set #def_cat_lang #def_lang_italiano)
(set #def_doc_lang #def_doc_italiano)
(set #wrongOS "ARC richiede almeno l'OS 2.x per funzionare\n")
(set #ARCInst_dir (cat "Scegli la directory per ARC\n"
"(Nessun nuovo cassetto sarà creato)"))
(set #lang_catalog (cat "Quale catalog vuoi installare?\n"
"(L'inglese è gia predisposto)"))
(set #lang_manual "Scegli la lingua per la documentazione in formato AmigaGuide®")
(set #icons_prompt "Quale tipo di icone vuoi installare?\n")
(set #ndx_prompt (cat "Vuoi installare la lista degli indici\n"
"di Aminet® aggiornata?\n"
"(aggiornata al: 18-Ago-98)\n"))
(set #brain_prompt (cat "Vuoi anche installare il\n"
"brainfile d'esempio?\n"
"(contiene solo 1 voce!)\n"))
(set #Y "Certo!")
(set #N "No...")
(set #done_1 (cat "\nARC è stato installato con successo.\n\n"
"Premi l'icona di \"ARC\" nella\n"))
(set #done_2 "\nsua directory per lanciarlo.")
)
)
(if (= @language "srpski")
(
(set #def_cat_lang #def_lang_Srpski)
(set #def_doc_lang #def_doc_Srpski)
(set #wrongOS "ARC-u je potreban barem OS 2.x\n")
(set #ARCInst_dir
(cat "Odaberite direktorijum za ARC\n(Direktorijum NEÁE "
"biti napravljen!)"
)
)
(set #lang_catalog
(cat "Koji katalog äelite da instalirate?\n"
"(Za engleski nije potreban nijedan)"
)
)
(set #lang_manual
(cat "Za koji jezik äelite da instalirate AmigaGuide®"
"dokumentaciju?"
)
)
(set #icons_prompt "Koje ikone äelite da instalirate?\n")
(set #ndx_prompt
(cat "Da li äelite da instalirate novu\n"
"listu direktorijuma na Aminetu®?\n"
"(od 02. februara 1999.)\n"
)
)
(set #brain_prompt
(cat "Da li äelite da instalirate\n"
"primer glavnog fajla?\n"
"(sadräi samo jedan unos!)\n"
)
)
(set #Y "Da")
(set #N "Ne")
(set #done_1
(cat "\nARC je uspeãno instaliran.\n\n"
"Kliknite na ikonu \"ARC\" u\n"
)
)
(set #done_2 "\ndirektorijumu da ga startujete.")
)
)
(if (= @language "polski")
(
(set #def_cat_lang #def_lang_Polski)
(set #def_doc_lang #def_doc_Polski)
(set #wrongOS "ARC potrzebuje przynajmniej OS 2.x.\n")
(set #ARCInst_dir
(cat "Wybierz katalog dla ARC\n(NIE bëdzie tam utworzony "
"nowy katalog!)"
)
)
(set #lang_catalog
(cat "Który z plików lokalizacyjnych chcesz zainstalowaê?\n"
"(Jëzyk angielski jest wbudowany)"
)
)
(set #lang_manual
(cat "Wybierz jëzyk dla dokumentacji w formacie AmigaGuide®"
)
)
(set #icons_prompt "Które ikonki chcesz zainstalowaê?\n")
(set #ndx_prompt
(cat "Czy chcesz zainstalowaê zaktualizowany\n"
"indeks Aminetu®?\n"
"(aktualizacja: 18-Lut-98)\n"
)
)
(set #brain_prompt (cat "Czy czcesz równieû zainstalowaê\n"
"przykîadowy plik z danymi?\n"
"(zawiera tylko jeden przykîad!)\n"
)
)
(set #Y "Tak")
(set #N "Nie")
(set #done_1
(cat "\nARC zostaî zainstalowany.\n\n"
"Kliknij na ikonce \"ARC\" w katalogu\n"
)
)
(set #done_2 "\naby uruchomiê program.")
)
)
; * Start *
(set OS_ver (getversion "exec.library" (resident)))
(if (< OS_ver (* 39 65536)) (abort #wrongOS))
(complete 0)
(set ARC_dir
(askdir
(default "Sys:")
(prompt #ARCInst_dir)
(help @askdir-help)
)
)
(complete 10)
(set Catalog_lang
(askchoice
(prompt #lang_catalog)
(help @askoptions-help)
(choices "English" "Deutsch" "Italiano" "Srpski" "Français" "Svenska" "Polski" "Greek" )
(default #def_cat_lang)
)
)
(set Docs_lang
(askchoice
(prompt #lang_manual)
(help @askoptions-help)
(choices "English" "Deutsch" "Italiano" "Srpski" "Polski" )
(default #def_doc_lang)
)
)
(complete 25)
(set Icon_set
(askchoice
(prompt #icons_prompt)
(help @askoptions-help)
(choices "MagicWB" "NewIcons" )
(default 1)
)
)
(set NDX
(askbool
(prompt #ndx_prompt)
(help @askoptions-help)
(choices #Y #N)
)
)
(set BRAIN
(